home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
9-Digit Zip Code Directory
/
9-Digit Zip Code Directory (American Business Information) (ABIZIP-12).ISO
/
z4src.zip
/
ZIST.CPP
< prev
next >
Wrap
C/C++ Source or Header
|
1993-08-09
|
8KB
|
284 lines
//----------------------------------------------------------------------------
// MODULE DESCRIPTION
//
// Module: zn.cpp
// Title: Zinc Window Template
// Notice: John M. Weeder
// Copyright (c) 1993. All rights reserved.
// This module contains proprietary information and should be
// treated as confidential.
//
//----------------------------------------------------------------------------
// MAINTENANCE HISTORY
//
// $Workfile$
// $Revision$
// $Author$
// $Date$
// $Log$
//
//----------------------------------------------------------------------------
// MODULE NARRATIVE
//
// This module contains code for the class ZI_ST.
//
// The code in this module may be written in C++ or C.
//
// This module is portable to:
// DOS 3.X+
// MS Windows 3.X+
// OS/2 2.X+
// OS/2 2.0 PM
//
// The following compilers are supported:
// MSC 6.0A
// MSC/C++ 7.0
// Borland C++ 3.1 for DOS
// Borland C++ 1.0 for OS/2 2.X
//
//----------------------------------------------------------------------------
#include <zi.hpp>
#define USE_WIN_ST
#if OS_DOS
#include <zid.hpp>
#elif OS_WINDOWS
#include <ziw.hpp>
#else
#include <zio.hpp>
#endif
//----------------------------------------------------------------------------
// Description: Default constructor
// Parameters:
// Returns:
//----------------------------------------------------------------------------
FN_M ZI_ST::ZI_ST(Z4_STATE _state)
: ZN_WINDOW("WIN_ST", ZN_LOAD_CENTER|ZN_LOAD_HELPBAR|ZN_LOAD_NO_SHOW)
{
ZI_ST::Initialize(CL_INIT_CLASS);
state = _state;
Setup();
}
//----------------------------------------------------------------------------
// Description: Destructor
// Parameters:
// Returns:
//----------------------------------------------------------------------------
FN_M ZI_ST::~ZI_ST()
{
ZI_ST::Destroy(FALSE);
Terminate();
}
//----------------------------------------------------------------------------
// Description: This function attempts to make a partial match to a state
// name and place the virtual list selector on that state.
// Parameters:
// Returns: TRUE if successful.
//----------------------------------------------------------------------------
VOID FN_M ZI_ST::CheckMatch()
{
PCSZ pcsz = GetString(FID(STR_SEARCH));
if (pcsz && fInit)
{
CHAR szWork[160];
strcpy(szWork, pcsz);
strtrim(szWork);
if (stricmp(szLastMatch, szWork) == 0)
return ;
strcpy(szLastMatch, szWork);
if (st_file.First(szLastMatch) != Z4_ST_INVALID)
SetVlistPos(st_file.RecordNo());
}
return ;
}
//----------------------------------------------------------------------------
// Description: Display detail windows
// Parameters:
// Returns: TRUE if successful.
//----------------------------------------------------------------------------
BOOL FN_M ZI_ST::Detail()
{
st_file.Record(lCurrent);
PZI_ST_DETAIL pzi_st_detail = new ZI_ST_DETAIL(st_file.Code());
if (pzi_st_detail == NULL)
return ErrorNoMem();
else if (pzi_st_detail->IsValid())
pzi_st_detail->Show();
return TRUE;
}
//----------------------------------------------------------------------------
// Description: Destroy object. Free any resources used by object.
// Normally called by destructor.
// Should allow multiple calls from various classes.
// A class should almost always re-init its variables when
// it is destroyed to prevent accidents.
// Parameters: fDestroyAll Destroy parents also?
// Default is TRUE.
// Returns: TRUE if successful.
//----------------------------------------------------------------------------
BOOL FN_M ZI_ST::Destroy(BOOL fDestroyAll)
{
ZI_ST::Initialize(CL_INIT_CLASS_VARS);
if (fDestroyAll) // Destroy parent.
ZI_ST_PARENT::Destroy(fDestroyAll);
return TRUE;
}
//----------------------------------------------------------------------------
// Description: Initialize object.
// Normally called by constructor.
// Should allow multiple calls from various classes.
// Parameters: sInit Initialization code. May be one of the following:
// CL_INIT_CLASS Reset class variables and
// and dynamic allocations for
// this class only.
// CL_INIT_CLASS_VARS Reset class variables for
// this class only.
// CL_INIT_VARS Reset class variables for
// this class only.
// CL_INIT_ALL Initialize class and all
// parent class, including
// dynamic memory allocation.
// Default is CL_INIT_ALL
// Returns: TRUE if successful.
//----------------------------------------------------------------------------
BOOL FN_M ZI_ST::Initialize(SHORT sInit)
{
if (sInit == CL_INIT_VARS || sInit == CL_INIT_ALL)
ZI_ST_PARENT::Initialize(sInit);
szLastMatch[0] = '\0';
lCurrent = 0;
fInit = FALSE;
st_file.SetMask(Z4_ST_SPELLED_OUT);
lRecords = 0;
state = Z4_ST_INVALID;
return TRUE;
}
//----------------------------------------------------------------------------
// Description: Event monitor function.
// Parameters: msg Event code
// pv1 Data pointer 1
// pv2 Data pointer 2
// Returns: Event code
//----------------------------------------------------------------------------
ZN_MSG FN_M ZI_ST::User(ZN_MSG msg, PVOID, PVOID pv2)
{
switch (msg)
{
case ZN_MSG_INIT:
fInit = TRUE;
if (state != Z4_ST_INVALID)
{
SetString(FID(STR_SEARCH), st_file.Full(state));
CheckMatch();
}
SetCurrent(FID(STR_SEARCH));
return msg;
case ZN_MSG_TERMINATE:
return msg;
case ZN_MSG_VLIST_INIT:
{
static int aiTabstops[] = { 2, 45, 0, 0 };
PZN_VLIST_INIT pzn_vlist_init = (PZN_VLIST_INIT)pv2;
pzn_vlist_init->lElems = lRecords = (LONG)st_file.Records();
pzn_vlist_init->fs = ZN_VLIST_SINGLE|ZN_VLIST_TITLE;
pzn_vlist_init->aiTabstops = aiTabstops;
}
return msg;
case ZN_MSG_VLIST_TITLE:
{
PZN_VLIST_ELEM pzn_vlist_elem = (PZN_VLIST_ELEM)pv2;
pzn_vlist_elem->pszBuf = szFormat;
strcpy(szFormat, "\tState\tAbbreviation");
}
return msg;
}
if (IsError()) // Error condition
return msg;
switch (msg)
{
case ZN_MSG_STRING_CHANGE:
CheckMatch();
break;
case ZN_MSG_VLIST_QUERY:
{
PZN_VLIST_ELEM pzn_vlist_elem = (PZN_VLIST_ELEM)pv2;
pzn_vlist_elem->pszBuf = szFormat;
szFormat[0] = '\0';
if (st_file.Record(pzn_vlist_elem->lId))
sprintf(szFormat, "\t%s\t%s", (PSZ)st_file, st_file.Abbreviation());
}
break;
case ZN_MSG_VLIST_SELECT:
{
PZN_VLIST_ELEM pzn_vlist_elem = (PZN_VLIST_ELEM)pv2;
lCurrent = pzn_vlist_elem->lId;
}
// Fall through
case ZN_MSG_VLIST_CURRENT:
{
PZN_VLIST_ELEM pzn_vlist_elem = (PZN_VLIST_ELEM)pv2;
LONG lRec = pzn_vlist_elem->lId;
st_file.Record(lCurrent);
sprintf(szFormat, "State %lu of %lu, %s",
(LONG)lRec+1, (LONG)st_file.Records(),
st_file.Abbreviation());
SetHelp(szFormat);
}
break;
case ZN_MSG_VLIST_DBL_CLK:
{
PZN_VLIST_ELEM pzn_vlist_elem = (PZN_VLIST_ELEM)pv2;
lCurrent = pzn_vlist_elem->lId;
}
// Fall through
case TB_DETAIL:
Detail();
break;
case ZN_MSG_HELP:
return ZN_MSG_NO_HELP;
case TB_CLOSE:
Close();
break;
case TB_SELECT:
st_file.Record(lCurrent);
SendMessage(ZiMainWindow(), ZI_MSG_STATE, NULL, (PVOID)st_file.Abbreviation());
SendMessage(ZiMainWindow(), ZI_MSG_CITY, NULL, NULL);
SendMessage(ZiMainWindow(), ZI_MSG_ZIP5, NULL, NULL);
Close();
break;
case TB_HELP:
NotDone();
break;
}
return msg;
}
//----------------------------------------------------------------------------
//------------------------------- End of File --------------------------------
//----------------------------------------------------------------------------